home *** CD-ROM | disk | FTP | other *** search
/ Dino Crisis Digital Press Kit / Dino Crisis Digital Press Kit.iso / mac / f / 00025_Script_25 < prev    next >
Text File  |  1999-09-02  |  735b  |  32 lines
  1. on mousedown
  2.   global gSoundLevel
  3.   set the soundlevel to 0
  4.   
  5.   
  6.   
  7.   set the visible of sprite 19 to false
  8.   set the visible of sprite 20 to false
  9.   set the visible of sprite 21 to true
  10.   set the visible of sprite 22 to false
  11.   set the visible of sprite 23 to false
  12.   
  13.   repeat while the stilldown
  14.     checkblip
  15.     set the movierate of sprite 10 to -5
  16.     updatestage
  17.   end repeat
  18.   
  19.   
  20. end
  21.  
  22. on mouseup
  23.   global gSoundLevel
  24.   set the visible of sprite 19 to true
  25.   set the visible of sprite 20 to false
  26.   set the visible of sprite 21 to false
  27.   set the visible of sprite 22 to false
  28.   set the visible of sprite 23 to false
  29.   set the movierate of sprite 10 to 1
  30.   set the soundlevel to gSoundLevel
  31. end
  32.